library(dplyr)
library(kableExtra)

tbl1 <- bind_rows(mtcars, mtcars, mtcars, mtcars)

kable(tbl1, longtable = T, row.names = 1:128) %>%
  pack_rows(index = c("g1" = 3, "g2" = 6, "g3" = 5, "g4" = 5, "g1" = 3, "g2" = 6, "g3" = 5, "g4" = 5,
                      "g1" = 3, "g2" = 6, "g3" = 5, "g4" = 5))


haozhu233/kableExtra documentation built on April 13, 2024, 6:49 p.m.